Динамическое создание компонентов, рассмотренное на предыдущем уроке, можно использовать и для создания массивов компонентов.

Например, нам надо расположить на форме 3 кнопки. Если они будут выполнять в программе схожие функции, то лучше их оформить в виде массива. Для этого сначала этот массив объявляем:

...
var
  Form1: TForm1;
  btn: Array[1..3] Of TButton;
  ...

После этого добавьте в окно кода следующий обработчик для события OnCreate (для этого перейдите в Инспекторе объектов на вкладку Events, и сделайте двойной щелчок на событии OnCreate):

procedure TForm1.FormCreate(Sender: TObject);
var
  i:Integer;
begin
  for i:=1 To 3 do
  begin
    btn[i]:=TButton.Create(Form1); //Создаем кнопку
    btn[i].Parent:=Form1; //Задаем родительское окно
    btn[i].Top:=10;
    btn[i].Left:=10+60*(i-1);
    btn[i].Width:=50;
    btn[i].Height:=50;
    btn[i].Caption:=IntToStr(i) //Задаем заголовок для кнопки
  end
end;

Теперь можете запускать программу (F9). Будет создан массив из трех кнопок:

---

Автор Алексеев Игорь..